home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / UTIL / SYS / IFFILE / _files / iffile_asm next >
Text File  |  1991-04-24  |  426b  |  27 lines
  1. .ENTRY   startup 
  2.  
  3. SP      .EQU    R13     ; sp is R13
  4. link    .EQU    R14     ; link is R14
  5.  
  6.         .PROC   helloworld
  7.  
  8. startup 
  9.  MOV   R8,R1
  10. loop LDRB  R0,[R8],#1
  11.  CMP   R0,#32
  12.  BHI   loop
  13.  MOV   R0,#0
  14.  STRB  R0,[R8,#-1]
  15.  MOV   R0,#5
  16.  SWI   "XOS_File"
  17.  MOVVS PC,R14
  18. fix
  19.  CMP   R0,#1        ; 0 for IfNoFile, 2 for IfDir
  20.  MOV   R0,R8
  21.  SWIEQ "XOS_CLI"    ; NE for not
  22.  MOV   PC,R14
  23.         SWI OS_Exit
  24.                 .END
  25.  
  26.  
  27.